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SEO 0359 


94 ! * 004® ooo^il 

000572' 000002 


000000 


76' 004® ooo3ti 000000 


225 

227 

229 

229 

230 

231 

232 

233 

234 

235 
235 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 


000604’ 000002 
000606’ 003 
000610’ 004537 
000614’ 003 
000616’ 004537 


0C3622* 046102 
000626’ 000004 
000630’ 177777 


000632’ 

000632’ 

000632’ 

000632’ 

000632’ 

000632’ 


364 

D00012 

000012 


020113 


BYTE 

UORD 


k^l0.,0,i 

UOrS 4®fl0.,0,i 


BYTE 

UORD 

BYTE 

UORD 



; WRITE ALL 

; WRITE THING & NARK 

;STOP 
;STOP ALL 


DEVICE INTERFACE UORD SYMBOL TABLE 


6VIUST: 


.ASCII 

.UORD 

.UORD 


/BLK / 
DEVIU1 
177777 


MODEL STATEMENT TA3.E 


LnmAIT: 

LUAIT: 

LSTATS: 

LCOUNT: 

LFUO: 

LREV: 

LSTOP: 


246 

inv$ci 
I.V.’Vc | 

fcvH^cl 

000 



LSTALL: .BYTE 

0 

249 




LRDNUH: 

<377>/INT0/<377> 

250 

377 

047111 

047524 

L ROALL: .ASCIZ 

000640’ 

000377 



LURALL: 


2S1 

000642’ 

000642’ 

000650’ 




< 377) /FROM/ <377) 

252 

043377 

047522 

177515 

LURTN: .ASCIZ 


000 



.EVEN 


2S3 


000652 




254 





HSKPST= . 


2S5 


000652’ 




2S6 





ISTATr . 


257 

000652’ 

000654* 

000000 



. UORC 

0 

25B 

000000 



.UORD 

0 

259 

000656’ 

000000 



.UORD 

0 

260 

000660’ 

000662’ 

000000 



.UORD 

0 

261 

262 

263 

000000 



.UORD 

0 

000664’ 

000005 



CSTAT: .BLKU 

5 

264 





BYRD: .UORD 


265 

000676’ 

000700’ 

000702’ 

000704’ 

000000 



0 

266 

000000 



.UORD 

0 

267 

000000 



BYUR: . UORO 

0 

268 

000000 



.UORD 

0 

269 

000706’ 

000713’ 

000712’ 

000714’ 

000000 



RDCNT: .UORD 

0 

270 

000000 



URCNT: .UORD 

0 

271 

000000 



MISCNT: .UORD 

0 

272 

000000 



ERRCNT: .UORD 

0 

273 

00071b’ 

0000 OG 



DATAER: .WORD 

0 


;END OF TABLE 


: STORAGE FOR DEV REG’S AT INT 


; DEV REG CURRENT VALUES STORAGE 

; BYTES REAO COUNT (READ. ROALL, & RONUH) 

; BYT^^URITTEN COUNT (IflITE, fcflALL, i 

| REAO CMND COUNT (REAO. ROALL, & RONUM) 
URITE CMND COUNT (HRltE. URALL, S URH) 
;MISC. CWQ COUNT (STOP $ STPALL) 

DEVICE ERRORS COUNT 
;DATA ERRORS COUNT 


M H:N0£C-n-DT T C«-8 TCll/TUSb DEVICE ROUTINE FOR MPG MACY11 

:ttc«.ph standard device routine table 


274 

000720’ 

000000 

INTCNT 

.WORD 

0 

275 






27b 

000722’ 

000724’ 

00072b’ 

000730’ 

000000 

TOECNT 

.WORD 

0 

277 

000000 

ERR AOR 

.WORD 

0 

278 

000000 

CNTAOR 

.WORD 

0 

278 

oooooo 

CURFLG 

.WORD 

0 

280 

000732’ 

000734’ 

oooooo 

CURCNT 

.WORO 

0 

281 

oooooo 

CURCNO 

.WORD 

0 

282 

00073b' 

000740’ 

(iii it i|^ 

INBLKN 

.WORD 

0 

283 

OOOOOO 

FINCNT 

.WORD 

0 

284 

000742’ 

oooooo 

REVCNT 

.WORD 

0 

285 


000744’ 

HSKPEN: 



28b 






287 


oooooo 

XXXX= 

0 



SE3 03t>0 


HOI 
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INTERRUPTS COUNT 

• OF ENTRIES INTO T/0 ERROR ROUT 
CURR ADR IN USER PROG 
AOR OF BYTE COUNT TOTALS 
FLAG WORD OF CURR CftC 
WORD CNT FOR CURR CltC 
CURRENT BLK ORIENTED CMNO 
INITIAL £k I FOR SEARCH 
FINAL WORD COUNT (TCWC) 

TAPE DIRECTION REVERSAL CNT 


; VALUE TO BE TAILORED BY DEV ROUT 


SEQ 03b 1 


NAIN0EC-11-DTTCA-B TCIMUSb DEVICE ROUTINE FOR NPG 
DTTCA6.P11 TC1I SUPPORT ROUTINES ENTERED FROM NPG 


101 
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289 

290 

291 

292 

293 

294 

295 
2% 

297 

298 

299 

300 000744’ 

301 0007%’ 

302 000750’ 

303 000754’ 

304 000756’ 

305 000760’ 

306 000764’ 

307 000770’ 
1772’ 


. SBTTl TCI 1 SUPPORT ROUTINES ENTERED FROM NPG 


; DEVICE ROUTINE HOUSEKEEPING 


JSR 

.WORD 


RS.HSKEEP 

o Or i 


774’ 

310 000776’ 

311 

312 

313 

314 

315 

316 

317 

318 

319 

320 


00572S 


HSKEEP: 

TST 

001003 



BNE 

032702 

000004 


BIT 

001010 



BNE 

010700 


101: 

40V 

062700 

177672 


ADO 

012701 

00003S 


P10V 

005020 


201: 

CLR 

SMI 



& 

000205 


301: 

RTS 


R 2 = PROG’S OPSW 
DESTROYS RO,Rl 


(R5)4 

10S 

•HSKPEP.R2 

30S 

PC.RO 

»H$KPST-..RO 

•HSKPEN-H$KPST/2.RI 

(ROH 

& 

RS 


322 

001000’ 

001004’ 

004067 

003120 

REPORT: 

JSR 

323 

032715 

177776 


BIT 

324 

325 

001010’ 

001012’ 

001014’ 

« 



BNE 

NOV 

326 

062700 

177662 


ADO 

327 

001020’ 

001024’ 

001026’ 

012701 

000012 


NOV 

328 

005720 


51: 

TST 

329 

001003 



BTC 

330 

001030’ 

005301 



DEC 

331 

001032’ 

001374 



BNE 

332 

001034’ 

000513 



BR 

3^4 

Sift 

004767 

012504 

003114 

101: 

JSR 

NOV 

335 

001044’ 

001050’ 

001052’ 

032704 

000002 


BIT 

336 

001443 



BEG 

337 

004567 

003124 


JSR 

338 

001056’ 

177606 



.WORD 

339 

001060’ 

010700 



NOV 

340 

001062’ 

001066’ 

062700 

177570 


ADD 

341 

012701 

000005 


NOV 

342 

001072’ 

001074’ 

005720 


205: 

TST 

343 

001003 



BNE 

2*4 

001076’ 

005301 



DEC 


; TCI 1 REPORT ROUTIfC 


JSR RS .REPORT 
. WORO FL&D 


RO.SRVREG 
•177776, (RS) 

^RO 

•B^RD-. ,R0 

•10. ,R1 

(ROH 

IDS 

R1 

51 

DVREX 

PC.SUPTAO 

(R$)*,R4 

•2.R4 

DlOCNT 

R5.STSTAT 

CStflT-. 

PC.RO 

•ISTRT-..RQ 
•5.R1 
(R0) + 

30S 

Ri 


S/R CALL 

0 = DO HSKP PER OPSU 

1 = UNCOND. DO HSKP 


; UNCONDITIONALLY DO HSKP’ 
;N.Y-10! 

;Oreu SPECIFY EACH PASS HSKP’ 
Y.N-301 

;S£t UP FIRST UC AOR 

; SET UP • OF WORDS 
; HSKP ALL NECESSARY AREAS 


; EXl T IN-LlfC 


S/R CALL 
FLAGUORD 

BIT 15 = CNND HOOE CALL 
BIT 9 = PROG STNNT CALL 
BIT 1 = DO STATUS REPORT 
BIT 0 = DO COUNTS REPORT 

SAVE REG’S RO - RS 
DISPLAYING CNTS AT EJ© OF 

tf-sag** 

GET • OF CNT WORDS 
THIS CNT WORD = 0’ 

Y.N-1M 

Di'CR WORD CNT 

CK’ED ALL WORDS’ CY.N-5S) 

GO TO EXIT — ALL CftTS ARE O’ S 
SET UP PROG TBL AOR IN R3 
GET FLAGWORD 

GOING TO DO STATUS DISPLAY" 


wim * 1 


STATUS REG’S 

SET UP ADR OF REG’S AT 
LAST JNT 

SET UP • OF REG’S 
ALL REG’S = 0" 

N.Y-40J 


NAIN0EC-11-DTTCA-8 TCll/TUSb DEVICE ROUTINE FOR NPG 
DTTCAB.P11 TC11 SUPPORT ROUTINES ENTERED FROtl NPG 


345 OOllOO’ 

3*48 001110' 
349 00111*4’ 


351 Kii»’ 

352 00112*4’ 

353 00112b’ 

354 001130’ 

355 001134’ 
35b 0011*40’ 

357 0011*42’ 

358 0011*4*4’ 

359 001 ISO’ 

350 001152’ 

351 00115b’ 

352 001150’ 

353 001154’ 

s mw 

35b 001175’ 

£ W 

359 001205’ 

370 001212’ 

371 001215’ 

372 001222’ 

373 001224’ 

374 001230’ 

375 001232’ 

9 88iffr 

378 001242’ 

379 001244’ 

I? » 

382 001254’ 

383 001250’ 

s w 

& 8811 ??’ 

388 

389 

390 001274’ 

& 88i5ffl 

393 001302’ 

394 001304’ 

395 001305’ 
395 001310’ 

397 001312’ 

398 001314’ 

399 001315’ 

400 


001374 

m 

004557 

003437 


000402 

004757 

004557 

003444 

000012 

004557 

177514 

004757 

000402 

004757 

010701 


052702 

012257 

004057 

011100 

880800 

004057 


001353 

004557 


003115 

003315 


003172 


003072 

003272 


003145 

003230 

003042 

000001 

000012 

177475 

000055 

000012 

002702 

175525 

002702 


003152 


DISCNT: 

DISCT1: 


RPTLP: 


RPT9AS: 


004557 003152 


002550 


003470 

HSi 

003520 

003545 

003550 

003575 

003524 

003541 

003557 


RPTEND: 


DVREX: 


REPTBt: 


BNE 

fsR 

JSR 

.WORD 

.WORD 

BR 

JSR 

JSR 

.WORD 

.WORD 

JSR 

.WORD 

JSR 

BR 

JSR 

NOV 

AQO 

NOV 

ADO 

NOV 

JSR 

NOV 

JSR 

. UORD 

JSR 

ffi 

BTC 

JSR 

JSR 

.WORD 

j!T 


JOl 

NACY11 27(732) 


20S 

P??DISUNn 
R5. PRINT 
ATIHSG-. 

BilDISPST 

IStflT-. 

45S 

PC, DISUNN 
RS! PRINT 
CUW1SG-. 
10 . 

RS.DISPST 
CStflT-. 
PC, PRTIWO 
DISCT1 
PC, DISUNN 
»KR4_ 


•10., TO 
PC.R1 

® 8-" 1 

•&PTBL-..R2 

( R2 ) ♦, RPTBAS 

RO.SAfaEG 

(RlKRO 

R5.a6lNRSC 

xxb: 

RO.RESREG 

RPTLP 

R5.PRINT 

CNtgjG-. 

CNTSEN-CNTSNG 

RS, PRINT 

RENOHG-. 

RO£SREG 


BCNRO-RPTBftS 






CHOCRO-RPT0AS 


CNTERR-RPTBPS 

CNTDER-RPTBRS 

CNTINT-RPTBAS 


SEP-75 14:00 PAGE 4-1 


SEQ 0352 


; DISPLAY C'JRR UNIT I 
|IS5UE 'AT LAST INT’ MSG 


;GQ DISPLAY STATUS AT LAST INT 


CONTINUE DISPLAY 
DISPLAY CUm UNIT • 
ISSUE ’ CURRENTLY’ NSG 


; GO DISPLAY CURffcNT STATUS 

;G0 DISPLAY INFO WORDS 
; CHECK FOR COUNTS DISPLAY 
•.DISPLAY CUm UNIT • 

■S£t UP • OF WORDS 
;SET UP AOR OF CNTS 

;SET UP TBL AOR 

; NOV NSG AOR TO S/R LINKAGE 
; SAVE ALL REG’S 
GET CURRENT COWT 
; CONVERT IT TO ASCII 

; RESTORE REG’S 

\W& » 

; Y.N-RPTLP 

;G0 ISSUE COUNTS NSG 


; ISSUE "E« OF REPORT NSG 


; RESTORE REGISTERS 
; SET UP RETURN POINT 
EXIT IN-LINE 


NAINOEC-ll-DTTCA-B TC11/TU58 DEVICE ROUTINE FOR MPG 
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SEO 0383 


401 

402 

403 

404 

405 

406 001320’ 

407 001324* 

408 001332* 
40S 001334’ 

410 001340* 

411 001344’ 

412 001350* 

413 001352’ 

414 00135b' 

415 0013b0* 
41b 0013b4’ 

417 001370’ 

418 001374’ 
418 001400’ 

420 QQ14Q2’ 

421 ffil4(N’ 

422 001410’ 

423 001412’ 

424 00141b’ 

425 
42b 

427 

428 
428 

430 

431 

432 

433 001420’ 

434 001424’ 

435 00142b’ 
43b 001432’ 

437 001440’ 

438 001444’ 


; TIMEOUT ERROR ROUTINE 

; JSR R5.T0UTER 


005287 

028727 


02b? 
001031 
0040b7 
004787 
004587 
177314 
004587 
000404 
112714 
004787 
042713 
004587 
001553 

m 

012805 

000177 

000205 


17737b 

177372 000007 

002S84 

002812 

002832 

00251b 

000011 

002480 

000010 

001b74 


0Q2S30 

178432 


TOUTER: INC 
CMP 


JS 
JSR 
JSR 
.WORD 
JSR 
BR 
M0V8 
JSR 
BIC 
JSR 
.WORD 

MOV 

JHP 

TOUTEX: RTS 


10S: 


TOECNT 
TOECNT, *7 
TOUTEX 

roTsavreg 

pc.suptao 

RSlSTSTAT 

CStftT-. 

RS.TVECT 

lOi 

•1 1 . ( R4 ) 
PC.AlNTV 
•WT4I0T, (R3) 
RS.ERRC§1 
IOTO-ERMBAS 

&3.RESREG 

(SA)+.R5 

3CUPGER 

RS 


; KILL USER PROGRAM ROUTINE 


S/R CALL 


INCR « OF TIMEOUTS THAT OCCURRED 

THIS SEVENTH TIMEOUT IN A ROW’ 

Y.N-TQUTEX 

SAVE ALL REGISTERS 

SETUP TCCM $ PROG TBL ADR’S 

STORE CURRENT STATUS 

CK IF I HAVE VECTOR CONTROL 
BR IF I DON’T 

RESET INT ENABLE l STOP THE TAPE 
RESET THE INTEWUPT VECTOR 
RESET WAITING FOR I/O FLAG 
ISSUE TIMEOUT ERROR MSG 


; JSR RS.KILL - 
;R3 MUST CONTAIN PROG TBL AOR 
; DESTROYS R0,R1 


; RESTORE REGISTERS 
REMOVE RETURN AOR 
GO TO ERROR EXIT 
; EXIT IN-LI* 


S/R CALL 


004587 

000407 

002450 

KILL: 

JSR 

BR 

018701 

178372 


MOV 

112781 

000011 

000002 

Move 

004787 

002404 


JSR 

000205 


KILLEX: 

RTS 


RS.TVECT 

kiLlex 

DREGA0.R1 

«11.2(ftl) 

pc.Aintv 

RS 


;CK IF I HAVE VECTOR CONTROL 
BR IF I DON’T 
; GET DEV REG AOR 

RESET INT ENABLE & STOP THE TAPE 
; RESET INT VECTOR ir^O 
EXIT IN-LINE 


SE J 03 84 
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uu * • W I 

001480’ 

001484’ 


440 

441 

442 

443 

444 

445 
445 

447 00144b’ 

448 001454' 

449 

450 

451 

452 

453 

454 

455 
45b 

457 001488’ 

458 001474’ 

459 
4bO 
4bl 
4b2 
4b3 
4b4 

4b5 00147b’ 

4bb 001504’ 

467 

4b8 

4b9 

470 

471 

472 

473 00150b’ 

474 001514’ 

475 
47b 

477 

478 

479 

480 

481 

482 

483 

484 


0427b7 

004787 


042787 

000205 


052787 

000205 


100000 

001508 

002384 


178328 WPIT : 


052787 

000205 


100000 


004000 178278 FMD: 


004000 176288 REV: 


.S8TTL TC11 FUNCTION ROUTINES 

; "UP IT" FUNCTION ROUTINE 

; JSR R5.UPIT 

8IC *1 00000 .DFLGWD 
JSR PC,CKDB$Y 

m & r,ntv 

; -NOWPIT" FUNCTION ROUTINE 
; JSR RS, NOWPIT 


178308 NOWPIT: BIS 
FUNCEX: F~S 


ilOOOQO, DFLGWD 


485 

001518’ 

001522’ 

001528’ 

012701 

000105 

REPD: 

MOV 

488 

012702 

000011 


MOV 

4B7 

004767 

001434 

RDCOM: 

JSR 

488 

489 

001532’ 

001538’ 

001540’ 

C05287 

010700 

177150 


INC 

MOV 

490 

082700 

177140 


POD 

491 

001544 ’ 

000458 



BR 


; “FUO~ FUNCTION ROUTINE 

; JSR R5.FW0 

BIC 14000, DFLGWD 

RTS R5 

; “REV" FUNCTION ROUTINE 

; JSR R5.REV 

815 14000, DFLGiC 

RTS R5 

;-REPO~ FUNCTION ROUTINE 

JSR RS.REPO 
.WORD m 
WORD ADR 
.WORD CNT 
.WORD DEV 


•105 ,R1 

•011.R2 

PC.C^DBSY 

RDCNT 

PC.RO 

•B^RD42-.,R0 

CHDCOM 


78 14:00 PPGE 5 


FUNCTION CPLL 

; RESET THE -NOWPIT" FLAG 
; WPIT IF BUSY & DO TERMINATION 
; RESET THE INTERRUPT VECTOR 
EXIT IN-LINE 


FUNCTION CPLL 

; SET THE “NOWPIT- r LPG 
; EXIT IN-LINE 


FUNCTION CPLL 

;RESET THE REVERSE FLAG 
{EXIT IN-LINE 


FUNCTION CPLL 

; -FT THE REVERSE FLAG 
{EXIT IN-LINE 


FUNCTION CPU 

OPTP POORESS (BITS 18 S 17, 
DPTP POORESS (BITS 0 - 15) 
BYTt COUNT 
(NOT USED) 

;SET UP REPO CNNO COOE 
;SET UP REPO FLAG WORD 
;G0 CK IF DEV IS BUSY 
;PDQ 1 TQ READ CNND CNT 
•SET UP POR OF BYTES REPO CNT 

;G0 TO CNND COMMON PROCESSING 



SEG 0385 
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493 

494 

495 

496 

497 

498 

499 

500 

501 

502 

503 

504 

505 

506 

507 

508 

509 

510 

511 

512 

513 

514 

515 

516 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526 

527 

528 

529 

530 

531 

532 

533 

534 

535 

536 

537 

538 

539 

540 


001546* 

001552* 

001556’ 

001562’ 

001566’ 

001570’ 

001574’ 


001576’ 012701 000103 
001602’ 012702 000102 
001606’ 000747 


RDNUH: 


001610’ 012701 000007 
301614’ 012702 000232 
001620’ 000742 


RDALL: 


001622’ 012701 000017 
001626’ 012702 000032 
001632’ 000751 


012701 

000115 

WRITE: 

MOV 

012702 

000011 

WRCOH: 

MOV 

004767 

001404 

JSR 

005267 

010700 

177122 


INC 

MOV 

062700 

000442 

177114 


ADD 

BR 


; “WRITE” FUNCTION ROUTINE 


JSR R5. WRITE 
.WORD AOft 
.WORD ADR 
.WORD CNT 
.WORD DEV 

•115, R1 

»01l!R2 

PC.CKDBSY 

WRtNT 

PC.RO 

•B*WR+2-.,R0 

CMOCOM 


‘RDNUH" FUNCTION ROUTINE 

; JSR RS.RDNUM 

.WORD ADA 
;.WORD CNT 


HOV 

MOV 

BR 


•103, R1 
•102, R2 
RDCOfl 


{“RDALL" FUNCTION ROUTINE 


HOV 

MOV 

BR 


JSR 

.WORD 

.WORD 

•007, R1 
•232.R2 
ROCOH 


RS.ROALL 

aoA 

CNT 


WRALL: 


•WRALL" FUNCTION ROUTINE 


JSR RS.WRALL 
.WORD ADA 
.WORD CNT 


HOV *017, R1 
MOV #032 . R2 
BR WRCOM 


FUNCTION CALL 

DATA ADORESS (BITS 16 & 17) 

DATA ADDRESS (BITS 0-15) 

BYTE COUNT 
(NOT USED) 

;SET UP WRITE CMND CODE 
SET UP CMND FLAG WORD 
GO CK IF DEV IS BUSY 
ADD 1 TO WRITE CMND CNT 
| SET P ADR OF BYTES WRITTEN CNT 

;G0 TO CMND COMMON PROCESSING 


FUNCTION CALL 
DATA ADDRESS 
BYTE COUNT 

;SET UP RDNUH CHfC CODE 

;SET UP CMND FLAG WORD 

;G0 TO COMMON READ PROCESSING 


FUNCTION CALL 
DATA ADORESS 
BYTE COUNT 

;SET UP RDALL CMND CODE 
;SET UP CMND FLAG WORD 
GO TO COMMON READ PROCESSING 


FUNCTION CALL 
DATA ADORESS 
BYTE COUNT 

;SET UP WRALL CMND CODE 
SET UP CMND FLAG WORD 
GO TO COMMON WRITE PROCESSING 
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SE9 0355 


542 

543 

544 

545 
5% 

547 

548 001534’ 

549 00ib40’ 

550 001b44' 

551 

552 

553 

554 

555 
55b 

557 0015%’ 

558 001552’ 

559 001555’ 

550 001552’ 

551 001555’ 

552 

553 

554 

555 
555 

557 

558 001570’ 

559 001574’ 
570 001700* 


012701 

012702 

000744 


012701 

012702 

004757 

005257 

000405 


012701 

012702 

000755 


000013 

000022 


WRTM: 


000111 

000044 

001304 

177024 


000101 

000044 


STPALL: 


;**WRTM" FUNCTION ROUTINE 


JSR 

M 

.Ui 


R5.WRTN 

►©ft 

CNT 


MOV 

MOV 

BR 


‘STOP- 


STOP: 

MISCOM: 


MOV 

MOV 

JSR 

INC 

BR 


1013, R1 
•Q22.R2 

urcoA 

FUNCTION ROUTINE 

; JSR R5,ST0P 

•111.R1 
1044. R2 
PC.CfcDBSY 
MI^CNT 
CMDCOM 


‘STPALL** FUNCTION ROUTINE 
; JSR RS, STPALL 


MOV 

MOV 

BR 


IlGl.Rl 
1044! R2 
MISCWI 


FUNCTION CALL 

m m* 

; SET UP URTM CHNO COOE 
; SET UP CHNO FLAG MOTO 
GO TO COMMON MRI T EPROG£SSING 


FUNCTION CALL 

; SET UP STOP CHNO COOE 
;SET UP CMND FLAG WORD 
GO CK IF OEV IS BUSY 
;AOD 1 TO HISC. CMND CNT 
;G0 TO CHNO COMMON PROCESSING 


FUNCTION CALL 

;SET UP STPALL CHTC COOE 

•SET UP CMNO FLAG UORO 

;G0 TO HISC. CMND COM PROCESSING 
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SEQ 03fc 7 


jCONNRNO COmON PROCESSING ROUTINE 

CCN OEV REG 


R4 « 

ill s 


COUNT TOTRLS, IF APPLICABLE 


■ mC FLAQMORD FORMAT: 


587 

580 

505 

550 

551 

552 001702’ 

553 00170b’ 
S’* 001712’ 
555 00171b’ 
5% 001722’ 
557 001724’ 

m 

18 ? IBIW 

b02 001742’ 
b03 001744’ 
bOt ®174b’ 
b05 00179’ 
bOb 00 i 752’ 
bC7 001754’ 
bQB 00175b’ 
b05 001750’ 
blO QQ1784’ 
bll 001770’ 
bl2 001772* 
bl3 001774* 
b!4 00200Q’ 

in m- 

bl7 002010’ 
b!0 002014’ 
bl5 002020* 
b2C iTWp? ’ 
b2l 002026’ 
522 002030’ 
b23 002032’ 
524 002034’ 
b2S 00S>?0' 

b& 002044’ 
527 002050 ’ 


010087 
010287 
005087 



ilb%0 

042700 

050014 


177020 

17701b 

178104 

000003 

000004 

000001 


17874b 

178750 


000001 


178724 

000035 

000007 

001240 


m 

173777 


CNOCOfl: NOV 
NOV 

8 ?? 

0EQ 

AOO 

SIT 

BEG 

nov 

ASL 

RSI 


BIT 

BEG 

TST 

NOV 

N0V8 

CNP 

BIOS 

JSR 

.MORO 

.WORD 

BR 

NOV0 

NOV 

SIC 

BIS 





AT FINAL INI 
TR SERVICE 
ORE CJf© 

BYTE COUNTS 


RO.CNTROR 

Rj^CURFLG 

*3.R2 

ioi 

•4 R4 

«l t R2 

51 

(AS.+.R C 

RO 

SO 

RC 

RG 

R0.R1 

(R5)+,(P4) 

(RS)*.-(R4, 

(R4) 

( R4 ) , CURCNT 

(Rnj.fTncnt 

(R4) 

-(R4) 

•1.R2 

<&♦ 

Rl.CURCNO 

PCuR0V(R3),R0 

^KIrnbrs 

10 . 

30S 

R0.1(R4) 
DFdGWO.RO 
«17377*,R0 
RO, CRH) 


SRVE ROR OF BYTE COUNT 
SAyf FLAO© FOR TERMINATION 

this qvw have akufcnts^ 

Y.N-101 

POINT AT BUS ADR AEG 


5INT AT JU5AQR 
ARgNENTOH)’ 


g£t BITS 18 l 17 OF BUS ROR 
ALIGN n€N TO CORRECT 
BIT POSITIONS 


SET TVCN INTO Of® COOE WORD 
GET BUS AQR BITS 0-15 


NAKE IT A WORD COLtfT 

INlflAL& C ?S(NAL CNT TO S«S 
NAKE IT «GATIVE 
REALIGN Jf C AOR TO TCCN 
4 MGtICNT Cftf>» 

B$PAS?FOURTM AROfCNT 

GET Cm 

ft-jr 

Go REPORT INV OEV • ERROR 
GO TO ERR RETN 

as m w? ^ 6ITS 9 w “ 10 

RESET ALL BITS EXCEPT REV FLAG 
SET JP TAPE DIRECTION 



ISSUE TtC I 


HOMRir b: 
-uTnot 


N.Y 

uAit fob I 


GO PROCESS 
fxn Th-ui 


RESET WAIT 

GO TO EXIT 










NAINOEC-11-OTTCA-B TC11/TUS6 DEVICE ROUTINE 
DTTCAB.P11 TC11 NON-INTERRUPT COMMAND & 



&7H 002274’ 
b7S 
87b 
b77 
b78 

b79 002302’ 
bBO 0023$*’ 
b81 00230b’ 
b82 002310’ 
b83 002312’ 
bflH 00231b’ 
SB5 002322’ 

& K 

bae 002330’ 

b89 002332 ’ 

b90 002334’ 

891 00233b’ 

b92 

b93 

b94 

b95 002340’ 
o% 002344’ 
b97 302352 ’ 
b96 00^6’ 
fe99 0023b2’ 

S? 8B$ 

702 002374’ 

TC3 O^Tb; 

704 002402 

705 00240b’ 
70b 

707 

700 

709 002410’ 

710 002412’ 

711 002414’ 

712 00241b’ 

713 002420’ 

714 302422’ 


042701 

110114 


004757 

000430 

032787 


032702 

001443 


105714 

100378 

005714 

100415 

018402 

042702 

010220 

005201 

001411 

011320 

005201 

001352 

000405 


004787 

052787 

010187 

010164 

010084 

fflSS 

005713 

112714 

004787 

000701 


105714 

100378 

005714 

100752 

0120C2 

042702 


000100 

000010 


000003 

000454 

000010 176442 

000222 

000200 


NONINT: 


177776 

177774 


000152 25S 

175430 30S 

000004 

001610 


000011 

001550 


177774 


D02 


W WG HACY11 27(732 ) 24-SEP-76 14:00 PACE 6 
ITA SERVICING 

.S8TTL TC11 NON- INTERRUPT CONNANO & DATA SERVICING 


JSR 

BIS 

NOV 

NOV 

NOV 

JSR 

.WORD 

TST 

NOVB 

JSR 

BR 


•100.R1 
Rl, (RM) 
»lfi,R2 


(R4) 

JP« 

PC.5EARCH 

2St 

HO.CURFlG 

10S 

PC.NINTSU 
• 260 , R 2 
50S 

j-RDALl** SERVICING 

(R4) 

20S 

(R4) 

301 

“2 ( R4 K R2 
•177774.R 2 
R2, (R0)+ 

& 

{ R3 ) , ( RO ) ♦ 

% 

40S 


m nSfSm rf® 

BLK X«CH TYPE Of CffC’ 

Y.N-70S 

RWDYjET’ 

“rdnuh cmpc cooe 

GO SEARCH FOR BLK 
ERROR ’ (N.Y-2SI) 

FOK) THE 6u’ 

^^Pup REGISTERS 
"ROALL" CfIC’ 

Y.N-50S 


READY SET’ 
Y.NJQS 

EMOR BIT SET’ 


ERRORBI 


JG M|TH BITS lb & 17 
WITH BITS 18 l 17 


m urns, 

STORE BITS 6-15 FROM TCDT 
CECR fCG UORD CUT 
CNT = 0’ (Y.N-20S) 

GO TO TERHlfaTION 


;NON-INT DfC TERMINATION 


PC.NINTSU 

ll.QFLGUD 

Rl.FINCNT 

R1.2(R4) 

R0.4(R4) 

5fti?5 w 

(R3) 

S!|dFTA(i 

cn6eno 

;-t*ALl- SERVICING 

(R4) 

SOS 

(R4) 

30S 

(R0)*.R2 
*1777/4, R2 


SET [p CORRECT REG VALUES 
SET THE •ERROR* FLAG 
STORE FINAL WORD CNt 
HOVE FINAL CNT TO TCWC 
MOVE FINAL |US ADR TO TC8A 
STORE ALL STATUS REGISTERS 

KNOCK DOW READY IF STILL JP 

ffl%l 

GO PROCESS TERMINATION S EXI T 


READY SET’ 

EARoHlT SET’ 

N.Y-30S 

GtT WORD WITH BITS 18 S 17 
RESET OTHER 8ITS 


eoe 
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24-SEP-76 14:00 PAGE b-1 


00242b' 

002432’ 

mt'- 

002440’ 

as# 

002452' 

002454’ 


00245b’ 

m m- 

730 00246b’ 


< , 

7 

m 

722 

723 

724 

725 


010264 

005201 

8H»9 

11 



___ j 4 

001774 

000736 


733 002474’ 

S 

736 002502’ 

737 002504’ 

738 002510’ 

734 002512’ 

740 002514’ 

741 

742 

743 

744 

745 002S16’ 
7% 0Q2S22’ 
74 7 00252b’ 

746 002530’ 

^49 002534’ 


17777b 


001000 17777b 60S: 


NOV 

INC 


JV 
INC 

fif 

BEQ 

BR 



000034 

70S: 

JSR 



BOS: 

& TB 

• •.-Ttfiil 



TST 




m 

001403 



BEG 

i »--%iJl 



NOV 

INC 




3R 


000310 

SOS: 

NOV 

mScVI 


100S: 

DEC 

00137b 



BTC 




BR 




;NON- 




NOV 

Olfc^Ol 



NOV 




NOV 


OOOOOb 



fViwl 



RTS 


R2,-2(R4) 

Rl 

(R3) 

Rl 

SOS 

11000, -2CR4J 

60S 

40S 

;“WRTfT SERVICING 

PC.NINTSU 

CRH) 

BOS 

(R4) 

B* 

SOS 

(R0)4,(R3) 

Rl 

80S 

•200.. R2 
R2 
1004 
40$ 


;N0N-INT REGISTER SETUP S/R 


4(R4),R0 
2/R4) ,R1 
P4.R3 
ifc R3 
PC 


SET BITS 16 l 17 INTO TCST 


am 

G UORO CNT 

? (y.n4os) 

SSED SETYET’ 


TO TCOT 



ERHINRTION 


SET UP REGISTERS 
READY^JET YET’ 

E<«0R BIT SET’ 

SftRO 3 ^ r 0’ 

N.Y 


TC0T 

GO WAIT FOR rCXT UORO 

SET UP DELAY CNT 

DELAY FOUtfCRED NICROSEC’S 

;G0 TO TERMINATION 


HOVE BUS AOR TO RO 

nove *G uqrdJnt to ri 

SET \p TCOTAOR IN R3 
; EXIT IN-LINE 


SE3 0370 




F02 
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DTTCAB.Pll 


TCII INTERRUPT SERVICE ROUTINE 




784 002802 

s m 

787 008810 
/o6 002812 

789 002820 

770 002824 

771 

772 

773 

774 

775 
778 002834' 
777 002840* 


1187 

m, 

m 

000403 

100008 

052787 

112/14 

000431 


<£ii ; 8? 



781 002858’ 

782 002882’ 

783 002888’ 

784 002870’ 

785 002874’ 
788 

787 

788 

789 002878’ 

790 002702’ 

791 002704’ 

792 002710’ 

793 002718’ 

794 002722’ 

795 002728’ 


0014fr4 

001424 

178144 

000010 

m 


702 000100 


1421 
018401 
018400 

SSI 

004777 

010084 

005284 

001754 

112714 

000412 


032702 

0017% 

042714 

016%7 

042713 

004087 

000177 


000004 

175230 

175222 

000004 

000002 

000103 


000040 

000100 


W 
001212 
175142 


55: 


000001 175182 1 

000011 


305: 


405: 

178022 505: 
805: 


.SBTTL TC11 INTERRUPT SERVICE ROUTINE 


TCINT : 


JSR 

INC 

JSR 

JSR 

.WORD 

NOV 

Ul 


RO.. 


j 

SR 


CURFLG.R2 

U 0 - 92 

yo3. R 

lOi 


VREG 

TRO 

TRT 


CH 


ST 

8PL 

BIS 

H0V8 

BR 


(R4) 

305 

•l.DFLGHO 
•fill, (R4) 
505 


;-RDNUrr USER CNND INI 


BIT 

BEQ 

NOV 

NOV 

& 

JSR 

NOV 

fi£ 

H0V8 

BR 


8(R4),R1 

4(R4).R0 

PC,»0T8YT 

R1 

PC, 3PUTBYT 
R0.4(R4) 

•103, (R4) 
80S 


; FINAL INTERRUPT PROCESSING 


Ul 

BIC 

NOV 

BIC 

JSR 

JNP 


,R2 


•100. (R4) 

2(R4).FINCNT 

•WT4l6T.(R3) 

RO.RESttG 

BRtNlNT 


SEQ 0371 


i% cm 

UP PROG TBL 5 TCCN ROR’S 
STORE All DEV REG’S 

GET THIS CNTC’S FLGHD 
I N| iy» XiwCH HODE* 

S^T UP RONUN WITH I NT ENABLE 
GO SE^CHFOR SPECIFIED BLK 
ERROR ON SEARCH 1 (N.Y-lOS) 

GO TO INT EXIT 

IS THERE RN ERR COWITION’ 

Y.N-30S 

§£t T* ERROR FLflG 

STOP TAPE & RESET INT ENABLE 

GO TO WtC TERMINATION 


DOING A USER "RDNjr CffC’ 
y.n-405 

g£t BLK • RERO 
GET CUWENT OATR AOR 

Me* 

STORE IT TOO 
STORE «W DATA AOR 
DECR fCG WORD CWT 
CNT = O’ (Njr-201) 

ISSUE “RONUfr* Of© AGAIN 
GO TO INTERRUPT EXIT 


-STOP- CftC AT FINAL INT’ 

s 

INT ENABLE 
STORE FINAL WORD COUNT 
RESET MAITINGFOR I/O TERN 
RESTORE ALL REGISTERS 
EXIT FROM INTERRUPT 
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SEO 0372 




747 

748 
744 
800 
801 
802 

803 

804 

805 

806 
807 
908 
304 
910 
811 

812 002740 

813 002742 

814 002746 
SIS QG27S0 

816 0027S2 

817 002760 

818 
814 
820 

821 002762' 

822 002770’ 

823 002772’ 

824 002774’ 

825 003000’ 

826 0030CN’ 

827 003010’ 

828 QC3012’ 

829 003016 ’ 

830 003024’ 

831 003026 ’ 

832 003034’ 

833 003036’ 
874 003042’ 

835 003044’ 

836 

837 

838 

834 
040 

841 

842 003074’ 
643 

8H4 

8H5 

8% 00X76’ 
847 003102’ 
S4fi 003110' 
844 003112’ 
850 003114’ 
651 Q0312C’ 

852 303124’ 


103404 
>7 



010067 
010114 
062716 
7 
14 
0013% 
105001 
156701 
042767 
0CC762 


052701 
026467 
DO 1411 
003351 
042701 
062700 
032714 


■ S8TTL TC11 SEARCH FOR DECTAPE BLOCK S/R 


; SEARCH FOR SPECIFIED BLOCK 

[ARCH 


050001 

016700 

Wl 

032767 

0010% 


026467 
001 4X 
002421 
162700 
052701 
032714 
001012 
,7 


0000 35 
175036 
004000 


SEARCH: 40 


175022 


000006 

175746 


000002 

004000 

004000 


60S: 

m 


70S: 

000006 


000010 

174746 


175674 


BOS: 

B5S: 

000002 


004000 


8i 



95S: 

175646 

000010 

175634 



004000 

000006 


004000 

000002 

004000 


175626 


100S: 


102S: 


BIS 

40V 

TST 

B4I 

BIT 

BNE 


CHP 

BEQ 

BLT 

SUB 

BIS 

BIT 

BNE 

INC 


BLO 

&S S 

40V 

40V 

A0O 

RTS 

BIT 

JNE 

lie 

BR 


BIS 

C4P 

BEG 

BGT 

BIC 

ADO 

BIT 


_ WITH OR U/0 INT ENABLE 
AOR 


ifi" 

;R1 = RONUH C4N0 
;R3 = PROG T8L (4 
;R4 = TCCH AOR 
.-DESTROYS RO.Rl 

PgURDV(R3),R0 

RO.Rl 

BL*,R0 

(R45 

nos 

•4000.DFLGUD 

100S 


; SEARCH FOR BLK FOR F«0 I/O 

6(R4),INBLKN 
401 
80S 

•2.50 

•40)0, R1 
#4000 (R4J 
80S 
REVCNT 
REVCNT, #6 
80S 

•^.OFLGHO 

RO.IfflLKN 
RI,(R4) 

•2 (SP) 

PC 

•4000, (R4) 

60S 
R1 

CURC4D.R1 
•lO.CuAFLG 
85S 


S/R CALL 

tXECUTEC IF AN ERROR 


GET OJRR DEV • 

ALIGN DEV l BITS 

S IftUTCogn 

* t ’ 

WING I/O'S IN REVERSE’ 
N.Y-100S 


AT THE BLK UE’RE LOOKING FOR’ 
4.Y-40S 

PfeT THEJLOCK’ (Y.N-80S) 

SUB 2 FRON ORG BLK • 

SET REV BIT IN CHND 
ALREAOY GOING REV’ 


N.Y-9QS 


_ 6 0 
Y.N-flOS 


r CNT 
rcTlON REVERSALS’ 


frttwwB aG 

msm ‘ 

SETUP NORMAL RET AOR 
Y.N-60S 

MR CHND CQQE FIELD 
.IN REOUESitD CltC COOE 
-SET BLK SEARCH NODE FlAG 
GO ISSUE CltC 


; SEARCH FOR BLK FOR REV I/O 

•4000. R1 
6(R4) , IN8LKN 
10SS 
BOS 

•4000, R1 
•2.R0 
•4C)00. (R4) 


INITIALIZE TO REV DIRECTION 
THIS THE BLOCK WE WANT' 1 
N.Y-lOSS 

IN FRONT OF THE BLK" iV. 4-BOS) 
SET DIR TO FUO 
ALLOW FOR TURN AROUNO 
ALREADY GOING FUD 1 


’tAirCEC-li-DTTCA-B TCli-'TUSfe DEVICE ROUTINE FOR IPG 
DTTCA6.P11 TCI I SEARCH FOR DECTAPE BLOCK S/R 


9S3 003130’ 

854 003132’ 

855 003134’ 
85b 003140’ 

857 003142’ 

858 

859 003144’ 
8SC 003150’ 
B61 003152’ 

852 003155’ 

853 003150’ 

354 003184* 


001742 

000727 

032714 004000 

001347 

0X764 

005764 177776 

100337 

032714 X40X 
X1315 

052701 004000 

0X712 


1051: 


1 1 OS : 


SE3 0373 


H02 
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80S 

70S 


•4X0, (R4) 
95$ 


102S 


-2(R4) 

891 

•4X0, (R4) 
70S 


•4000, R1 
70S 


NY -BOS 

g6 ck reversal cnt 

ARE UE GOINGREV’ 

g6 Y s?oISe AOJUSTED 8LK » 

ENO ZONE’ 

Y.N-88S 

g6ing REV’ 

N.Y-70S 

S^T DIRECTION TO REV 
GO CK REVERSAL CNT 




102 
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SUBROUTINES FOR TCll FUNCTION ROUTINES 


IF DEVICE IS BUSY AND WAIT IF IT IS 


; JSR PC , CKDBSY 

; DESTROYS R0,R3,R4 
; ON EXIT: 

;R3 = PROG TBL POP 
;R4 = TCCN ADR 

PC.SUPTAO 
1^0, (R4) 

RS.aCIOBSY 

ioi 

•2.DFLGK) 

30* 

PC.PROCTN 

ioi 

IVTTA0.40S 

R?KETVEC 

xxxx 

xxxx 

TCINT-. 

RS.ERRAOR 

•4.ERRA0R 

PC 


S/R CALL 


; SET UP PROG TBL & TCCN POP'S 

; RELEASE CONTROL 
*G0 CK AGAIN 

IHAVETO PROCESS PREV TERMINATION^ 
Y f| 3QI 

;G6 PROCESS TERMINATION 
;G0 REOCCK INT ENABLE 
;STog M ^Ktor ** 

STOtt PROC STATUS WORD 
GO XT UP T* VECTOR 

; ® VECT ° R ** 

! REL INT ROUT POP 
; SAVE CURR USER STMNT POP 

;EXIT IN-LINE 


INFORMATION DISPLAY S/R 


; JSR RS.ERRCS 
; JSR RSlERRIS 

!:HS S&T 6 * 8 

• DESTROYS R0,R1,R2 

Sti?5T BT 

•jgTAT-ERSTAO.ERSTAO 

•ISTAT-ERSTAO.ERSTPO 

(RS)*,Ew®AS 

(RS;+.ERMBA5+2 

ERRCNt 

§PR0NER,P0PSW(R3) 

ERREX 

R4,-(SP) 

R4 

PC, DI SUNN 
R5, PRINT 
XXXX 
XXXX 


RMBAS 


S/R CALL FOR CURR STATUS 
S/R CALL FOR INT STATUS 
REL AOR OF ERROR HSG 
« OF BYTES IN ERROR NSG 


; STORE CURR STATUS 

; STORE AOR OF CURR STA T US 
;G0 TO COMMON POINT 
; STORE AOR OF LAST INT STATUS 
; STORE NSG AOR 
; STORE HSG CNT 
;A00 1 TO ERROR CNT 
; ERROR PRINTING INHIBITED'* 
;N.Y-ERREX 
;SAVE R4 

;SET USER NODE PRINT FLAG 
; DISPLAY UNIT I 
: PRINT ERROR NSG SPECIFIED 


SCO 0375 


rairceC-ll-OTTCfi-B TCil/TUSfe DEVICE ROUTINE FOR HPG 
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922 003356’ 

923 003384’ 

m IKP 

926 003376’ 

\7 



[O’ 

930 003414’ 


933 

934 

935 


■ jo /' 

938 


941 




003426’ 

003430’ 

003432’ 

m&- 

003442’ 




942 003462' 

943 003%4’ 

944 

945 
9% 

947 

948 

949 

950 

951 003470’ 
474’ 


026727 

001411 

wm 

004567 


111001 
,7 

1‘ 

060100 

000771 

005720 

m\ 

004577 

m 

001514 

177762 


954 003510’ 

g m\v 

957 003522’ 

958 003524’ 

959 003526’ 
96C 003630’ 
961 003532’ 

952 003536’ 

953 003542’ 

964 003544’ 

965 0035%’ 



970 003574’ 

97J 


973 003606’ 

974 003612’ 

975 003614’ 

976 003620’ 

977 003624’ 


177770 

177760 

000714 


001701 

001713 


TAO 
‘ N 



000004 175300 


IQS: 


20S: 


0015% 

174414 


001534 


ERREX: 


CMP 

BEQ 

& 

JSR 


ERN8AS , •INVDVN-ERNBAS 
ERRSNH 

lINVBKN-ERMBAS 

R5.DISPST 



nove 

ss 

AOO 

BR 

TST 

JSR 

$ 

.WORD 

.WORD 



:ST(R3),R0 
(RO).Rl 
4(R0!,ERRA0R 
20S 
Rl.RO 

ioi 

(R0)4 

•§tHNUH-..Rl 

RSJOECASC 

STNfflG-. 

-14. 

(|P)+,R4 


INVALID UNIT • ERROR’ 

N, Y-ERRSNH 

Mb 001 * 

OlSPUW STATUS REG'S 

IOTA WMm 

SAVE STftrr LENGTH 
ERROR^jcCUR ON THIS STffiT’ 

p6intat nxt STftrr 

GO CK NXT STftrr 

SET UP AOR OF STHNT t DATA 

Set up data output aor 

CONVERT IT TO ASCII 

SI W & T0 S " C£S 

{RESTORE R4 
•EXIT iN-LlfC 


{PROCESS TERfllNATION OF PREVIOUS I/O FUNCTION 


004067 

000430 


PROCTfl: 

JSR 

042767 

000002 

174300 

175220 


11? 

032767 

OOOOOH 


001016 



8NE 

016700 

01671)1 

175214 

175216 



NOV 

NOV 

100001 




BPL 

005401 




NEC 

160100 



21: 

SUB 

006300 




ASL 

010067 

174262 



NOV 

016701 

175164 



NOV 

060011 

005541 




AOO 

AOC 

032767 

000001 

174226 

65: 

BIT 

001476 

012767 

000001 

174236 


BEQ 

NOV 

mu 

000400 

000002 


§NE 

032767 

000010 

174200 


BIT 

m 




BNE 

NOV 

062701 

001422 



AOO 

010132 




MOV 

m 

000023 

000040 


105: 

MOV 

MOVB 

005300 




DEC 


; JSR PC.PROCTH 
RO.SAVREG 

g:SWS 

fe:S? 

21 

R1 

R1,R0 

RESIZE 

CNtAOR.Rl 

RO.(Rl) 

-(Al) 

•1.DFLGUD 

80i 

•l.ERR 

•DyERCK , POPSU ( R3 ) 

ilO.DFLGUD 

»R1 

»C0DFLD-.,R1 
R1.R2 
»lA..RQ 
140, (R2)+ 

RO 


S/R CALL 
SAVE ALL REG’S 

R^T 0 P^<^ < TERmNA TIO N FLAG 

Y 

£ (S2W 

IS IT NEGATIVE’ CY.N-25) 

HAKE IT POSITIVE 

SUB REMAINING CNT FROM INITIAL CNT 

StSeJ OF B S?E? f |CTUALLY XFERRED 
GETADR OF SffTE CNT TOTALS 

3$ ffir WORD OF CNT 
HAS THERE AN ERROR’ 

s£t~?S ERROR INDICATOR 
SU^gD TO 00 ERROR CHECKING’ 

b£0CK SEARCH ERROR’ 

g£t~i$IS of cooe area in err nsg 

HOVE IT TO WORK REG 
SET UP AREA SIZE 
CLEAR AREA TO SPACES 


^iNDEC-Il-DTTCfl-B TC11'TU56 DEVICE ROUTINE FOR MPG 

: t t:q6.ph subroutines for tch function routines 


003626’ 

0C383C’ 


001374 

010700 


003b 40’ 

K 

003b50’ 

mratca* 


003bSb’ 

003bb0’ 

003bb4’ 

ooabbb’ 

003870’ 

003872’ 

003878’ 


003704’ 




000144 


082702 1 750 1 3 


005704 

WSk 

001003 

082700 

000770 

005718 

001402 

112721 

005218 

112021 

m 

354 


003724’ 


003740’ 

HR: 

003752’ 

003758’ 

003782’ 


003772’ 

003774’ 


001840 

“'!» 

7 

004577 

88^ 

004767 

004087 

000207 

887191 

000018 

000755 


000004 


000054 


000004 


177380 


174104 

174742 

000072 

000158 

177314 


HOVB 

TST 

if?B 

BNE 

ADO 

BR 

TST 

BEQ 

M0V8 

INC 

NOVB 

M0V9 

NOVB 

NOVB 

CNR 

i 

.WORD 


.WORD 

.WORD 

BR 


003778’ 

nnunrva* 


004015’ 

004022’ 

004027’ 

004034’ 

004041’ 

0040%’ 


042800 

100 

0%440 

020 

051410 

004 

wa 88? 

000 

004050’ 


042118 

040520 

052113 

0%111 

0%105 

0%102 

052101 

042516 


132 

042S22 

105 

050117 

105 

0%513 


ERCDTB: 


ASCII 

ASCII 

m\ 

ASCII 

ASCII 

M 

BYTE 

EVEN 


SEO 0376 


KOS 
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10S 

PC.RO 

W-" R0 

•IbTAT+1-. ,R2 
-(SP) 

(RU)4 R4 

R4 

60S 

R4.(R2) 

40* 

•4.R0 

20i 

(SP) 

50S 

•’..(Rl)+ 

(SP) 

(RQ)+,(R1)+ 
(RO)MRl)* 
(R0)4,(R1)+ 
(R0)4.(R1)+ 
•4, (Sr) 

RS^ERRIS 

T&HSG-ERMBAS 

SiRINTV 
RO RESREG 
RS.3CUPGER 

E&RCNT 
PC.RINTV 
R0| RESREG 

^h^-Irmbas 


; SET UP AOR OF ERROR COOC TBL 
;SET UP AOR OF STORED DEV REG’S 

iffWMcOIE 

; END OF THE COOE TBL’ 

•Tftli^8^R0R BIT SET IN STATUS B^E' 
* N y-HOI 

;P6lNT AT NXT COOE TBL ENTRY 
;G0 CK FOR NXT COOE 
;FIRST ERROR COOE IN MSG’ 

;N.Y-50S 

;WVE COMMA TO HSG 

;INC • OF COOES IN T% NSG 

;HOVE ERROR COOE TO MSG 


PUT 4 COOES IN THE MSG’ 

R£ST§i STACK 

GO ISSUE STATUS ERROR MSG 


GO RESET INT VECTOR 

RESTORE REG’S 

GO TO MPG ERR RETN POINT 

SSYto'SSoR CNT 
GO RESET INT VECTOR 
RESTORE REG’S 
EXIT IN-LINE 
ISSUE BLK SPCH ERR MSG 


; GO TO ERROR RETURN 


<200>/£ND2/ 
< 100> /PARE/ 
(04Q>/MKT|/ 
<020>/IL0P/ 
<010>/SELE/ 
<004>/BLKM/ 
<QQ2>/0ATM/ 
<uoi>/nexm/ 


; ERROR NSG COOE TABLE 


; TABLE TERMINATOR 


NAirCEC-li-DTTCA-B TC11/TUS6 DEVICE ROUTINE FOR HPG 
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SEQ 0377 


1030 

1031 

1032 

1033 

1034 

1035 
1035 

m 

1034 

1040 

1041 

1042 

1043 

1044 

1045 

!£$ 

1048 

1044 

1050 

1051 

1052 

1053 

1054 

1055 
1055 

1057 

1058 


004050* 

W 

004054’ 

004070’ 

004072* 


004074' 

004102’ 

004105' 

004112’ 

004114’ 

004115’ 

004120’ 

004122' 


01575 

0153% 

004577 


1 1 hi i 


175422 

000401 

005725 

000205 


; RESET INTERRUPT VECTOR S/R 


; JSR PC.RINTV S/R CALL 

;R3 MUST CONTAIN PROG TBL AOR 
; DESTROYS RO 


004557 

000020 

RINTV: 

JSR 

w» 

173744 000004 


BR 

MOV 

0045 77 

174000 


JSR 

000000 


10S: 

.UORO 

000207 


RINTEX: 

RTS 




; TEST 


R5.TVECT 

ivctSS.ios 

RS.aCL^VEC 

XXXX 

PC 


; TEST INTERRUPT VECTOR S/R 


GO CK IF I HAVE VECTOR CONTROL 

S R IF I DON’T 
ET CUftR INT VECT ADR 
GO HAVE HPG CLEAR IT 

; EX I T IN-LINE 


L^EL * 01 
R3 MUST CONTAIN PROG TBL ADR 
DESTROYS RO 


C/Q roi ! 

EXECUTED IF NOT SAHE 


173725 

000004 

173750 


000010 TVECT 
20S: 


HCV 
HOV 
JSR 
.WORD 
.WORD 

?ST 

TVECTX; RTS 


IVCTA0.20S 

PFHA0R*R3) ,-(SP) 

RS.3TSTVEC 

XXXX 

TCINT-. 

TVECTX 

c r5 ) ♦ 

RS 


GET CURR INT VECT AOR 
STORE FLGtO AOR TO IDENTIFY HE 
DOJ HAVE VECTOR CONTROL’ 

HPG UILL TELL HESINCE I CAN’T 
GET AT LOWER f€H IF *H HGHNT 
BR IF I OONT’T HAVE CNTRL 
BYPASS BR INST IN S/R CAlL 
EXIT IN-LINE 
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SEO 0378 


1060 

1081 

1082 

1083 

1064 
1085 
1088 

1067 
1088 

1089 

1070 

1071 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 
1060 
1061 
1082 
1063 
1004 

1065 

1068 
1087 

1066 
1069 

1090 

1091 

1092 

1093 

1094 

1095 
10 % 
1097 

1096 

1099 

1100 
1101 
1102 

1103 

1104 

1105 
1108 
1107 

1106 

1109 

1110 
1111 
1112 

1113 

1114 

1115 


004124* 

004126' 

004130’ 

004132’ 

004134’ 

004138’ 


004140’ 

004142’ 

004144’ 

0041%’ 

004150’ 

004152' 

004154’ 


004158’ 

004180’ 

004184’ 

004170’ 

004174’ 

004200’ 


004202’ 

004204’ 

004208’ 

004212’ 

004214’ 

004218’ 

004220’ 

004222’ 

004224’ 


010501 

082501 

018700 

012021 

012021 

012021 

012021 

011011 

000205 


.S8TTL SUBROUTINES FOR TCI 1 DEVICE ROUTINE 


;SAVE REGISTERS RO THRU R5 
; JSR RO.SAVREG 


0101% 

SAVREG: NOV 

R1,-(SP) 

0102% 

NOV 

R2 -(SP) 

0103% 

NOV 

R3,-(SP; 

0104% 

MOV 

R4,-(SP) 

0105% 

NOV 

R5,-(SP) 

010007 

NOV 

RO.PC 


005728 

RESREG: TST 

012805 

NOV 

012804 

NOV 

012803 

NOV 

012802 

NOV 


NOV 

000200 

RTS 


;SET 


; RESTORE REGISTERS RO THRU R5 
; JSR RO.RESREG 


(SPH 

(SPR.RS 

(SP)*,R4 

(SPH R3 

(SPH.R2 

(SP)* R1 

RO 


S/R CALL 

; SAVE RO THRU RS 

; EXIT IN-LINE 

S/R CALL 

; RESTORE RS THRU RO 

;EXIT IN-LINE 


; SET PROGRAM’S PROG TABLE AOR IN R3 & TCCfl ADR IN R4 


010703 


SUPTAD: NOV 

082703 

173820 

AOO 

188303 

177776 

SUB 

016704 

173830 

MOV 

082704 

000002 

AOO 

000207 


RTS 



{STORE 


; JSR PC.SUPTAO 

PC.R3 

•L&Z-..R3 

-2(R3),ft3 

0REGAD,R4 


S/R CALL 

;SET UP LOCATION ZERO AOR 

; SUBTRACT PROG T8L LENGTH 
GET DEV REG BASE AOR 
; POINT AT TCCH 
EXIT IN-LINE 


; STORE DEVICE’S STATUS REGISTERS 

; JSR RS.STSTAT 
; -WORD STAoR- 
DESTROYS R0,R1 


S/R CALL 
REL STORAGE AOR 


173612 


STSTAT: NOV 
ADD 
NOV 
NOV 
MOV 
MOV 
NOV 
NOV 
RTS 


RS.R1 

(RSH.R1 

DREGA6.R0 

(R0)*,(R1)* 

(RO)*, (Rl) + 

(R0)*,(R1)+ 

(RO)+ t (Rl)+ 

(R0),(R1) 

R5 


;GET REL STORAGE AOR & MAKE 
IT ABSOLUTE 
; GET AOR OF DEV REG’S 
{STORE ALL DEV REG’S 


;EXIT IN-LINE 


sea c. 
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111S 
1 ’ 17 
1x18 

1119 

111? 

1122 

1123 

1124 

1125 
1125 

1127 

1128 

1129 

1130 

1131 

llg 

1133 

1134 

1135 
1135 
1137 

m 

1140 

1141 

1142 

1143 

1144 

1145 
11 % 

1147 

1148 

1149 

1150 

1151 

1152 

1153 

1154 

1155 
1155 

1157 

1158 

1159 

1150 

1151 

1152 

1153 

1154 

1155 
1155 

1157 

1158 

1159 


; DISPLAY CURRENT UNIT » 


JSR 

R3 MUST C 
DESTROYS RG,R1,R2 


PC .0 I SUNN 

6NTAIN PROG TBL ADR 


S/R CALL 


004225’ 

004234’ 

004240’ 

004244’ 

0042%’ 


012757 
lit 



101007 
004577 
000410 
Cl 6757 
000410 
112757 


004304’ 

004310’ 

004312’ 

004314’ 



004557 
000323 
i i 


004316’ 

004320’ 

004322’ 


004334’ 

004340’ 

004344’ 

0043%’ 

004350’ 

004352’ 

004354’ 

004350’ 

004352* 

004355’ 

m- 

004374’ 

004375’ 


000031 

000035 

000007 

173505 

000405 

173554 

000122 


000055 DISUNN: 


000400 

000020 DISUIV: 


DISUPR: 

DISUHL: 


NOV 

nova 

CMP 

BHI 

JSR 

.UORD 

MOV 

BR 

NOV 

BIC 

JSR 

.UORD 

JSR 

.UORD 

.WORD 

RTS 


*2S..DISUNL 

PCUTOV(R3),P0 

R0.i7 

DI^UIV 

RS.3BTASLZ 

unAsci-. 

UNASC1+4.UNASCI 

DISUPR 

SMB8B- 

rs.bbinAsc 

unAsci-. 

R5.PRINT 
UNI TNG-. 

2S. 

PC 


»4C 
004404’ 


010502 


DISPST: MOV 

052502 


ADD 

010701 


MOV 

052701 

173572 

ADD 

0127% 

000005 

MOV 

012157 

000330 

10S: NOV 

012167 

000325 

MOV 

005721 


TST 

012200 


MOV 

0101% 


NOV 

0102% 

004577 

173476 

MOV 

JSR 

000316 


.UORO 

004557 

000044 

JSR 

rrriVihi 


.UORD 

000014 


.UORD 

012502 

012501 


MOV 

MOV 

005316 


DEC 

001355 

005725 


fgf 

Q0020S 


RTS 


; TAILOR STATUS NSG & PRINT IT 

; JSR R5.DISPST 
UORD STATAOR-. 

; DESTROYS RQ,R1,R2 


R5.R2 

(R$)*,R2 

PC.R1 

tDWEGS~.,RI 

•OVREGE-DWEGS/B.-CSP) 

(R1)+,DVRGMG 

<Rl)+jDVRGNG+2 

(R1 )♦ 

(R2J+.R0 

R1,-(SP) 

R2,-(SP) 

RslaeiNAsc 

DVRGOT-. 

R5. PRINT 

dvrgmg- . 

12 . 

(SP)+,R2 

(SP)*,R1 

(SP) 

101 
(SP) + 

R5 


INITIALIZE TO NORMAL MSG LNGTH 
GET CUfifi UNIT I 
VALID UNIT « 7 
Y.N-DISUIV 

C6NVERT » TO DECIMAL ASCII 

MOVE ASCII • TO 1ST TUO DIGITS 
GO ISSUE MSG 

SET UP ERR COND MSG LNGTH 
RESET HIGH BYTE 
CONVERT BINARY I TO ASCII 

;G0 ISSUE UNIT « MSG 
; EXIT IN-LINE 


S/R CALL 

REL ADR OF STATUS DATA 


;GET REL DATA ADR 
;MAKE IT ABS 

; SET UP ADR OF REG NAMES IN ASCII 

;GET I OF REGISTERS TO DISPLAY 
;NOVE REG NAME TO MSG 

; BYPASS DISP VALUE 
;GET REG’S STORED VALUE 
;SAVE R1 S R2 

; CONVERT IT TO ASCII 

; PRINT THE STATUS MSG 

; RESTORE R1 b R2 

DECR REG CNT 
DONE ALL 7 (Y.N-10S) 

REMOVE COUNT FROM STACK 
EXIT IN-LINE 


NAINOEC-il-OTTCA-B TCI 
DTTCtt.Pll SUBROUT 
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1174 

1175 

11» 

1178 

113 

1180 

1181 

::32 

1183 

1184 

1185 
118b 

1187 

1188 
lies 
1180 
1181 

1184 

1185 
11 % 

1187 

1188 
1188 
1203 
1201 
1202 

1203 

1204 

1205 

120b 

1207 

1208 
1203 
1210 
1211 
1212 

1213 

1214 

1215 

121b 

1217 

1218 


1221 

1222 

1223 


00441b* 000550 

00000b 



004430* 000207 


004432’ 010500 



003452’ 

003454’ 

00445b’ 


003464 ’ 

004472’ 


II I 

010112 

m 

016367 



000040 


0 00006 000 05 6 
173356 


003577 1733% 


173336 


004524* 010067 OOOOIO 



004540* 

004542’ 

004544 ’ 


000000 

000000 

000205 


10S: 


20S : 


401 : 


BOS: 

60S: 

PRTEX: 


; PRINT CURRENT "BUT VALUE 

; JSR PC.PRTIHD 
; DESTROYS nQ,R1,R2 


S/R CAU 


PRTIUD: 


£ 

.WORD 

JSR 

.UORO 

.WORD 

RTS 


RJaSnASC 

am 


RS.PRINT 


11 . 

PC 


; ISSUE HSG TO LIST DEVICE 


; JSR 
.UORO 
.UORO 


Rur 

BYTCNT 


PRINT: NOV 



),(«>♦ 

Rl!(R2) 

f*lifciN(R3) .PROGNH 
gSJKUST 

s 

RS.3CLIST 

xxxx 

xxxx 

rs,3Clist 

C&F-. 


?R 


TEX 
R0.50S 

£4$? I ST 

XXXX 

XXXX 

R5 


lOtf IT*^ ASCII 
•.ISSUE BLOCK • HSG 

; EXIT IN-LINE 


S/R CALL 
REL OF NSC 
KSG BYTE CNT (IF 3CGATIYE, 
nESET PRT OEV dedicated. J 

fCGATIVE, USE CltC WOE PRINT 

GET NSC ROR l HAKE IT A6S 

GET BYTE COUNT 
USE CIIC WOE PRINT’ 

s^tuPlii* 11*0 ADR 

HAKE ICC ADR REL 
STORE HSG ROR 
STORE NSC’S BYTE COUNT 
CNT NEC’ (Y.N-1QS) 

HAKE IT POSITIVE 
STORE PROG’S • IN HSG 
ISSUE PROG • 

; ISSUE HSG SPECIFIED 

; ISSUE A <CR> & <LF> 

GO TO EXIT 
STORE HSG’ S A8S AOR 
STORE ITS BYTE CNT 
GO TO HPG TO ISSUE T H£ HSG 

:Exr IN-LINE 









Ill 


NAlNOEC-il 

OTTCAfi.Pll 

1273 

127V 

127S 

ffl 

1278 

1278 

1280 

IL 

1283 
l! 

128b 
1287 
1< 

i! 

1281 
1282 
1283 
1» 

1285 
128b 

1287 

1288 
1288 
1300 
1X1 

1302 

1303 

1304 

1305 
130b 

1307 

1308 
1308 

1310 

1311 

1312 

1313 

1314 

1315 
131b 

1317 

1318 
1318 

1320 

1321 

1322 

1323 

1324 

1325 
132b 
1327 


13 
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PROGRAM TABLE FORMAT 


SEQ 0382 


000242 


000000 

000002 

8888?o 

ooooeo 

000040 

000100 

w 

000002 

100000 

040000 

020000 

010000 

004000 

nroppn 

884® 

000200 

888488 

000020 

000010 

000004 

000002 

000001 

000004 

00000b 

000010 

00001b 

000020 

000022 

000024 

00002b 

0000 3C 


PTLGTHx lb2. 

; (PTLGTH* 212. 
PFLGHO= *0. 


PROGRAM TABLE LENGTH - NON MEM MGMNT VERSION OF MPG 
PROGRAM TABLE LENGTH - MEM MGMNT VERSION OF MPG) 
PROGRAM FLAG WORD - 1 WORO 


URSTOPx 2 
ERSTOPx 4 
WTVlOTx 10 
CTPRJOx 20 
SETXD= 

188000 


1 * USER HAS STOPPED THIS PROGRAM 
1 x AM ERROR HAS STOPPED THIS PROGRAM 
1 x WAITING FOR I/O TERMINATION 
1 x CONSOLE OR PRINTER I/O IN PROGRESS 
1 x THITpROC SET THE PRT DEV DEDICATED FLAG 
1 x QgJ COOC if PRESENT 

1 x THIS PRO<J USES tt€ UNI BUS MAP (f€M MGJTT 

ACTIVE (SPECIFIED FOR EXECUTION. 


popswx 



1 x program IS 

; PROGRAM’S OPERATION SHI TOCS - 1 WORD 


Iit1i= 4888° 

CYCOVLx 2000 
GTNXTDx lQOO 

ooercx= vST 

SPOPERx 200 

HO?. 48° 

AUTORPx 20 
10 



ERROR 

DEVICE) 


1 X STOP PROG EXECUTION UPO N £ 

1 x CYCLE PROGRAM (ON CURRENT 
1 x DO NOT PRINT ON ERROR 

8 '.SB IB 

1 x CYCLE T>€ OEVIU wIST 

i : m 8s mmjE* *** 

1 x DEVIOESPECIAL OPERATION 

1 x D^NotSeRFORM I/O TlfCOUT 

1 x DO HOT AUTOMATICALLY DISPLAY COUNTS 

1 x AUTO DISPLAY COUNTS AT ETC OF FINAL PASS ONl 

1 = HOUSEKEEP COUNTS ONLY AT RUN COffWC 

1 X mtlf FTrSTMO BYTE OTI.Y ON verify 

1 X 00 NOT PRINTWOG COMPLETED MSG 


PEWAORx 4-4. 
PASCINx *h. 
PNATCx 4-8. 
PROIOAx 414 . 
PWRIOAs 4 lb . 
PSRCSTx 418 . 
P08JST= *20. 
PLNGTHx 422. 
PTOCNTx 424 . 


*;PROGRAM FLAGUORO ADORESS - 1 WORD 

PROGRAM’S NUMBER IN ASCII - 1 WORD 

PROGRAM’S NAME IN ASCII - b BYTES 

ADORESS OF RE AO I/O AREA - 1 WORD 

ADORESS OF WRITE I/O AREA - 1 WORD 

SOURCE STATEMENTS START AODRESS - 1 WORD 

OBJECT COOE START AODRESS - 1 WORD 

PROG AREA LENGTH (OBJ END MINUS PROG TBL S T ART) 

I/O TIMEOUT COUNT - I UORO 


1 UCRD 



SEQ 0383 
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*«irCEC 

DTTCR6. 


1328 

1330 

000032 

PfCLCOs +26. 

1331 

133b 

000034 

POPNTRs 428. 

000035 

PCURDV= +28. 

00X36 

PONUNS= *30. 

1337 

1340 

1341 

1342 

000056 

PTEM0= +46. 

000060 

PTEMls *48. 

000062 

PTEM2= +50. 

1343 

1344 

000064 

PTEM3= +52. 

1345 

13% 

000066 

PTEH4= +54. 

1347 

000070 

PTEN5= +5b. 

iS 

1350 

000072 

PTEM6= +58. 

1351 

1352 

000074 

PTEH7= +60. 

1353 

1354 

00007b 

PTEMB= +62. 

1355 

135b 

0X1X 

PTENSs +64. 

1357 

1358 

0X102 

P TEH 10= +66. 

1358 

13b0 

0X104 

PTEH11= +68. 

13 bl 

13b2 

0X106 

PTEM12= +70. 

1353 

1364 

0X1 ID 

PTEH13= +72. 

1365 

136b 

I3b7 

1366 

0X112 

PTEH14= +74. 

000114 

PTEH15= +76. 

1368 

1370 

00011b 

- 

rTtjpcs 

+78. 

1371 

1372 

0X120 

PSRC= 

♦80. 

1373 

1374 

0X122 

POSTs 

♦82. 

1375 

137b 

1377 

1378 

1378 

1380 

0X124 

PSTKCTs +84. 

0X126 

PSTKSVs +86. 

QPQ222 

PSVREG= +14b. 

1381 

1382 

300236 

PUSRPC= +158. 


DEV ROUT NOOEL • COOE - 1 WORD 

CURRENT DEVICE NUMBER POINTER - 1 BYTE 

CURRENT DEVICE I - 1 BYTE 

DEVICE NUMBERS - lb BYTES 

USER PROCRRM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEFPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEIPORARY STORAGE - 1 WORD 

USER PROGRAM TEIPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

USER PROGRAM TEMPORARY STORAGE - 1 WORD 

NUMBER OF BYTES TO TRANSFER ON HOVE (ICR) - l WORD 

DATA SOlPCE ADDRESS OM MOVE (SRC) - 1 WORD 

DATA DESTINATION AOORESS ON HOVE (DST5 - 1 WORD 

a OF WORDS (X 2) SAVED OFF STACK - 1 WORD 

STACK UORDS STORAGE AREA - 30 WORDS 

USER’S 30 THRU RS REGISTERS STORAGE AREA - b WORDS 

USER’S CURRENT PROGRAM COUNTER - 1 WORD 



SEQ 0384 


NAIfCEC-11 

OTTCAB.Pil 

138S 

1385 

1; 

L_ 

1385 
1350 

1354 

i 

1358 

1355 
1400 

1403 

1404 

1405 
140b 

1407 

1408 
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000240 


000242 


; FOLLOWING ENTRIES (PROIOX THRU PUBHAP) ARE ONLY IN HEN HGHNT VERSION 


(PROIOXs ♦ibO. 
(PROIOVr ♦lbN. 

(Puriox= ♦iba. 
(PURIOV* ♦172. 
(PUPARSs >17b 
(PUPORS= ^152. 
CPUBHAPs ♦BOB. 


18/22 BIT ABSOLUTE AOORESS OF RE AO I/O AREA - 2 WORDS) 
18 BIT VIRTUAL AOORESS OF REAO I/O AREA - 2 WORDS) 

18/22 BIT ABSOLUTE AOORESS OF WRITE I/O AREA - 2 WORDS) 
18 BIT VIRTUAL AOORESS OF WRITE I/O AREA - 2 WORDS) 
STORAGE AREA FOR USER'S PAR'S 0 THRU 7-8 WORDS) 
STORAGE AREA FOR USER'S POR'S 0 THRU 7-8 WORDS) 

1ST UNIBUS NAP REG • AK) t OF REGS USED - 1 WORD) 


; END OF HEN HGHNT OTi.Y ENTRIES 


PTSI2E= ♦ISO. 

; (PTSIZE* ♦aiO. 
PTEf€* ♦lb2. 
;(PTEf€= *212. 


PROGRAN TABLE SIZE IN BYTES - 1 WORD - NON fCN NGHNT 
PROGRAN TABLE SIZE IN BYTES - 1 WORD - NGHNT VERSION) 
END OF PROGRRN TABLE - NON HEN HGHNT VERSION 
VC OF PROGRAN TABLE - HEN HGfWT VERSION; 


SE5 0305 


I 
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1*410 ; DEVICE ROUTINE TABLE 


1411 



1412 



1413 

00011b 

DRTLTH= 78. 

1414 


• 

1415 

14 lb 

oooooc 

6evrsz= +o. 

1417 



1418 

000002 

DEVFUO= *2. 

1413 



1420 

OOOOL'H 

DEVIU1= +4. 

1421 



1422 

00000b 

0EVIU2= %. 

1423 



1424 

000010 

DEVIH3= 48. 

142S 



142t> 

000012 

DEVIU4= 410. 

1427 



1428 

000014 

DEVIW5= 412. 

1423 



1430 

00001b 

DEVlUbs 414. 

1431 



1432 

00002C 

DEVIH7= 4lb. 

1433 



1434 

000022 

0EVIH8= 418. 

1435 



143b 

000024 

OEVORA= 420. 

1437 



1438 

00002b 

OEVlVAs 422. 

1433 



1440 

1441 

1442 

000030 

DEVRPS= 424. 

000032 

DEV»FS= +2b. 

1443 



1444 

000034 

DHKPAO= +28. 

1445 



14% 

00003b 

OERPAO= 430. 

1447 



1448 

000040 

DKIlAO= 432 . 

1443 



145C 

000042 

OECTAO= 434. 

1451 



1452 

000044 

DTOEAO= 43b. 

14S3 



1454 

0000% 

DEVIOB= 438. 

1455 



145b 

000050 

DEVOER= 440. 

1457 



1458 

000052 

DVUPRT= 442. 

1453 



14bO 

000054 

DVCPRT = 444. 

1%1 



1452 

00005b 

CEVBTAs 4%. 

L%3 



i%4 

000050 

DVBTDAs 448. 

1455 




; DEVICE ROUTINE TABLE LENGTH 

DEVICE ROUTINE SIZE IN BYTES - 1 WORD 
DEVICE ROUTINE FLACHORD - 1 WORD 
DEVICE INTERFACE WORD » 1 - 1 UORO 

DEVICE INTERFACE WORD • 2 - 1 HORO 

DEVICE INTERFACE WORD *3-1 HORO 
DEVICE INTERFACE WORD • 4 - 1 HORO 

DEVICE INTERFACE MCRO « 5 - 1 UORO 

DEVICE INTERFACE HORO • & - 1 UORO 

DEVICE INTERFACE HORO *7-1 HORO (SIZE) 

DEVICE INTERFACE HORO « 6 - 1 UORO (ERR; 

DEVICE REGISTERS AOORESS - 1 HORO 

DEVICE INTERRIFT VECTOR AOORESS - 1 HORO 

DEVICE READ PROCESSOR STATUS UORO (BUS AEO) - 1 HORO 

DEVICE ttITE PROC STATUS HORO (BUS REQ) - 1 NORC 

DEVICE ROUT HOUSEKEEPING ROUT REL ENTRY AGR - 1 UORC 

DEVICE ROUT REPORT ROUT AEL ENTRY AOR - 1 HORO 

DEVICE ROUT KILL ROUTINE REL ENTRY AOR - 1 HORO 

DEVICE ROUT ERROR COUNTER REL ADR - 1 HORO 

OEVICE ROUT TIICOUT ERR ROUT REL ENTRY AOR - 1 UCRC 

DEVICE I/O BUSY BRANCH AOORESS (CIOBSY) - 1 HORO 

DEVICE ERROR BRANCH AOORESS (CUPGER) - 1 HORO 

USER NODE PRINT BRANCH AOORESS (LUST) - 1 UORO 

CHND < (ODE PRINT BRANCH AOORESS (CLIST) - 1 UORO 

CON\EFT BINARY TO ASCII Bfl ADR (8INASC) - 1 UORO 

CONNECT BINARY TO DECIMAL ASCII BR AOR iBTASLZ) - 1 UORC 
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1466 

000062 

DVPOTAs +50. 

146>? 

14L8 

000064 

DVSFWD= +52. 

1468 

1470 

000066 

DVSVEC= *54. 

1471 

1472 

000070 

DVCVECs *56. 

1473 

1474 

00007? 

DVTVEC= +58. 

1475 

1476 

000074 

DVRINT= +60. 

1477 

1478 

000076 

DVGETB= *62. 

1478 

1480 

000100 

DVPUTB= +64. 

1481 

1482 

000102 

DEVSTPs +66. 

1483 

1484 

000104 

DEVETPr +68. 

1405 

I486 

000106 

DVPTEPs +70. 

1487 

1488 

000110 

DWTEP= +72. 

1408 

1480 

1481 

1482 

000112 

DVCTEP= +74. 

000114 

DVIWSP= +76. 

1483 

1484 

000116 

DRTENO= +78. 

1485 

14% 

1487 

000001 

.END 


CONVERT PACKED DECIMAL TO ASCII BR AOR (DECASC) - 1 JO PL 

NPG SYSTEM FLAGWORO AOORESS (CS V SFW) - 1 WORD 

SET INTERRUPT VECTOR BR ADR (SETVEC) - 1 WORD 

CLEAR INTERRUPT VECTOR BR AOR (CLRVEC) - 1 WORD 

TEST INTERRUPT VECTOR BR AOR (TSTVEC) - 1 WORD 

RETURN FROM INTERRUPT BR AOR (RTNINT) - 1 WORD 

GET DATA BYTE BR AOR (GETBYT) - 1 WORD 

PUT DATA BYTE BR AOR (PUTBYT) - 1 WORO 

DEVICE ROUT REL SYMBOL TABLE POINTER - 1 WORD 

DEVICE ROUT REL ENTRY TABLE POINTER - 1 WORO 

PACK TABLE EXTEN. REL POINTER - 1 WORD 

VECTOR TABLE EXTEN. REL POINTER - 1 WORD 

COMPILER TBL EXTEN. REL POINTER - 1 WORD 

DEVICE INTERFACE WORO SYMBOL TBL REl POINTER - 1 *C=D 

END OF DEVICE ROUTIfC TABLE 
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ARALL 

001622R 

002 URCOM 001SS6R 

002 URTM 

001634R 

002 UT4I0T= 000010 

. ABS. 

000000 

000 





000000 

001 




TCI 1 

005276 

002 





ERRORS DETECTED: 0 
DEFAULT GL08ALS GENERATED: 0 

*, DTTCAB/NL : TOC/DOC=OTTCAB. PI 1 
ROn-TIFC: 4 S .S SECONOS 
RUN-TIME RATIO: 171/14=11.5 
CORE USED: 5K (S PAGES) 


= OOS276R 


DOCUMENT PAGES: 33 



